home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-1.iso / Files / Font / Font Tools / FontPrint 1.0.2.sit / FontPrint 1.0.2.rsrc / TEXT_160_tPrintDBFont.txt < prev    next >
Encoding:
Text File  |  1994-09-28  |  411 b   |  14 lines
  1. statusdict/jobname (FontPrint - printing double-byte font) put
  2. /fn (ThisIsTheFontNameThatMustBeMunged)def
  3. /Helvetica-Bold findfont 20 scalefont setfont
  4. 100 600 moveto fn show
  5. /Helvetica findfont 14 scalefont setfont
  6. 100 500 moveto (Double-byte font) show
  7. 100 400 moveto [
  8.    (Little)
  9.    (Medium)
  10.    (Big)
  11. ] ThisIsThePrintSize dup 2 gt 1 index 0 lt or
  12. {(Bad Print Size)}{get}ifelse show
  13. clippath stroke showpage
  14.